home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Lib / format / globalid2rfc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  1.0 KB  |  50 lines

  1. /* globalid2rfc.c - Converts a GlobalDomId struct into a RFC string */
  2.  
  3. # ifndef lint
  4. static char Rcsid[] = "@(#)$Header: /xtel/pp/pp-beta/Lib/format/RCS/globalid2rfc.c,v 6.0 1991/12/18 20:22:06 jpo Rel $";
  5. # endif
  6.  
  7. /*
  8.  * $Header: /xtel/pp/pp-beta/Lib/format/RCS/globalid2rfc.c,v 6.0 1991/12/18 20:22:06 jpo Rel $
  9.  *
  10.  * $Log: globalid2rfc.c,v $
  11.  * Revision 6.0  1991/12/18  20:22:06  jpo
  12.  * Release 6.0
  13.  *
  14.  */
  15.  
  16.  
  17.  
  18. #include        "util.h"
  19. #include        "mta.h"
  20.  
  21. int globalid2rfc (gp, buffer)  /* GlobalDomainIdentifier -> RFC */
  22. GlobalDomId     *gp;
  23. char            *buffer;
  24. {
  25.     char *cp = buffer;
  26.  
  27.     if (gp -> global_Private) {
  28.         (void) sprintf (cp, "/PRMD=%s", gp -> global_Private);
  29.         cp += strlen(cp);
  30.     }
  31.  
  32.     if (gp -> global_Admin) {
  33.         (void) sprintf(cp,"/ADMD=%s", gp -> global_Admin);
  34.         cp += strlen(cp);
  35.     }
  36.  
  37.     if (gp -> global_Country) {
  38.         (void) sprintf(cp, "/C=%s",gp -> global_Country);
  39.         cp += strlen(cp);
  40.     }
  41.     if (cp != buffer) {
  42.         *cp++ = '/';
  43.         *cp = NULL;
  44.     }
  45.  
  46.     PP_DBG (("Lib/globalid2rfc returns (%s)", buffer));
  47.  
  48.     return OK;
  49. }
  50.